home *** CD-ROM | disk | FTP | other *** search
/ How Many Bugs in a Box / How Many Bugs in a Box.cdr / bugs / juicebar / 00801.ls < prev    next >
Encoding:
Text File  |  1995-04-07  |  549 b   |  27 lines
  1. on mouseDown
  2.   pressbutton(the clickOn, "sign.dep")
  3. end
  4.  
  5. on mouseUp
  6.   global specials
  7.   set specials to specials + 1
  8.   if (specials mod 6) = 0 then
  9.     go("Sign.pos1(Specials)")
  10.   end if
  11.   if (specials mod 6) = 1 then
  12.     go("Sign.pos1(Beetlejuice)")
  13.   end if
  14.   if (specials mod 6) = 2 then
  15.     go("Sign.pos1(Spider Cider)")
  16.   end if
  17.   if (specials mod 6) = 3 then
  18.     go("Sign.pos1(Tick Tea)")
  19.   end if
  20.   if (specials mod 6) = 4 then
  21.     go("Sign.pos1(Bug Glug)")
  22.   end if
  23.   if (specials mod 6) = 5 then
  24.     go("Sign.pos1(Flea Fizz)")
  25.   end if
  26. end
  27.